unit Messages;

interface

type
   TClientMessage = record
		       Sign	 : Cardinal;
		       RevByte	 : Byte;
		       Cmd	 : Byte;
		       DataLength	 : Word;
		       DataIndex : Cardinal;
		    end;	 
   PClientMessage = ^TClientMessage;

implementation

end.